home *** CD-ROM | disk | FTP | other *** search
- // Borland C++ Builder
- // Copyright (c) 1995, 1998 by Borland International
- // All rights reserved
-
- // (DO NOT EDIT: machine generated header) 'Imglist.pas' rev: 3.00
-
- #ifndef ImglistHPP
- #define ImglistHPP
- #include <ToolWin.hpp>
- #include <ComCtrls.hpp>
- #include <ExtDlgs.hpp>
- #include <Dialogs.hpp>
- #include <Classes.hpp>
- #include <Controls.hpp>
- #include <ExtCtrls.hpp>
- #include <StdCtrls.hpp>
- #include <Forms.hpp>
- #include <Graphics.hpp>
- #include <SysUtils.hpp>
- #include <Messages.hpp>
- #include <Windows.hpp>
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Imglist
- {
- //-- type declarations -------------------------------------------------------
- enum TImageOperation { ioCrop, ioStretch, ioCenter };
-
- class DELPHICLASS TImageInfo;
- class DELPHICLASS TImageListEditor;
- class PASCALIMPLEMENTATION TImageListEditor : public Forms::TForm
- {
- typedef Forms::TForm inherited;
-
- __published:
- Stdctrls::TButton* OK;
- Stdctrls::TButton* Cancel;
- Stdctrls::TGroupBox* ImageGroup;
- Extctrls::TPanel* MainPanel;
- Extctrls::TImage* MainImage;
- Extdlgs::TOpenPictureDialog* OpenDialog;
- Extctrls::TRadioGroup* OptionsGroup;
- Stdctrls::TButton* Apply;
- Stdctrls::TComboBox* TransparentColor;
- Stdctrls::TLabel* TransparentLabel;
- Stdctrls::TLabel* FillLabel;
- Stdctrls::TComboBox* FillColor;
- Stdctrls::TButton* Help;
- Stdctrls::TGroupBox* GroupBox1;
- Comctrls::TListView* ImageView;
- Stdctrls::TButton* Add;
- Stdctrls::TButton* Delete;
- Stdctrls::TButton* Clear;
- Stdctrls::TEdit* Edit1;
- Stdctrls::TLabel* Label1;
- Stdctrls::TEdit* Edit2;
- Stdctrls::TLabel* Label2;
- Extctrls::TTimer* Timer1;
- void __fastcall AddClick(System::TObject* Sender);
- void __fastcall DeleteClick(System::TObject* Sender);
- void __fastcall ClearClick(System::TObject* Sender);
- void __fastcall FormCreate(System::TObject* Sender);
- void __fastcall FormDestroy(System::TObject* Sender);
- void __fastcall OptionsGroupClick(System::TObject* Sender);
- void __fastcall ApplyClick(System::TObject* Sender);
- void __fastcall TransparentColorChange(System::TObject* Sender);
- void __fastcall FillColorChange(System::TObject* Sender);
- void __fastcall TransparentColorExit(System::TObject* Sender);
- void __fastcall FillColorExit(System::TObject* Sender);
- void __fastcall ImageViewChange(System::TObject* Sender, Comctrls::TListItem* Item, Comctrls::TItemChange
- Change);
- void __fastcall ImageViewEdited(System::TObject* Sender, Comctrls::TListItem* Item, System::AnsiString
- &S);
- void __fastcall ImageViewKeyDown(System::TObject* Sender, Word &Key, Classes::TShiftState Shift);
- void __fastcall ImageViewDragDrop(System::TObject* Sender, System::TObject* Source, int X, int Y);
- void __fastcall ImageViewDragOver(System::TObject* Sender, System::TObject* Source, int X, int Y, Controls::TDragState
- State, bool &Accept);
- void __fastcall HelpClick(System::TObject* Sender);
- void __fastcall MainImageMouseMove(System::TObject* Sender, Classes::TShiftState Shift, int X, int
- Y);
- void __fastcall MainImageMouseDown(System::TObject* Sender, Controls::TMouseButton Button, Classes::TShiftState
- Shift, int X, int Y);
- void __fastcall MainImageMouseUp(System::TObject* Sender, Controls::TMouseButton Button, Classes::TShiftState
- Shift, int X, int Y);
- void __fastcall Timer1Timer(System::TObject* Sender);
- void __fastcall ImageViewEndDrag(System::TObject* Sender, System::TObject* Target, int X, int Y);
-
- private:
- bool FChanging;
- bool FSelecting;
- Controls::TImageList* FComponentList;
- Classes::TList* FInfoList;
- Controls::TImageList* FImageList;
- Controls::TImageList* FImageListView;
- Graphics::TBitmap* FImageBitmap;
- Controls::TImageList* FDragImageList;
- bool FOldMasked;
- Graphics::TColor FOldBkColor;
- Graphics::TColor FOldBlendColor;
- TDrawingStyle FOldDrawingStyle;
- TImageType FOldImageType;
- bool FPickingColor;
- void __fastcall AddColor(const System::AnsiString S);
- void __fastcall ClearBitmap(Graphics::TBitmap* Value, Graphics::TColor Color);
- void __fastcall ClearAllImages(void);
- void __fastcall ClearWithFill(Graphics::TBitmap* Bitmap, int Index);
- void __fastcall DeleteSelectedImages(void);
- void __fastcall FocusImage(int Index, int Count);
- TImageInfo* __fastcall GetImageInfo(int Index);
- int __fastcall GetIndex(void);
- void __fastcall MoveImage(int FromIndex, int ToIndex);
- void __fastcall Replace(int Index, Graphics::TBitmap* Image, Graphics::TBitmap* Mask);
- void __fastcall ReplaceMasked(int Index, Graphics::TBitmap* NewImage, Graphics::TColor MaskColor);
- void __fastcall SetImageFillColor(Graphics::TColor Color);
- void __fastcall SetImageOperation(TImageOperation Operation);
- void __fastcall SetImageTransparentColor(Graphics::TColor Color);
- bool __fastcall SetStates(void);
- void __fastcall StretchImageList(Controls::TImageList* SrcList, Controls::TImageList* DstList, int
- Width, int Height);
- void __fastcall CenterImageList(Controls::TImageList* SrcList, Controls::TImageList* DstList, int Width
- , int Height);
- void __fastcall UpdateImageView(void);
- void __fastcall StretchReplace(Controls::TImageList* List, int Index, Graphics::TBitmap* Image, Graphics::TBitmap*
- Mask);
- void __fastcall StretchReplaceMasked(Controls::TImageList* List, int Index, Graphics::TBitmap* Image
- , Graphics::TColor MaskColor);
- void __fastcall CenterReplace(Controls::TImageList* List, int Index, Graphics::TBitmap* Image, Graphics::TBitmap*
- Mask);
- void __fastcall CenterReplaceMasked(Controls::TImageList* List, int Index, Graphics::TBitmap* Image
- , Graphics::TColor MaskColor);
- void __fastcall DoImageListViewChange(System::TObject* Sender);
- void __fastcall UpdatePickColor(int X, int Y);
-
- public:
- void __fastcall AddBitmap(void);
- void __fastcall Center(int Index);
- void __fastcall Crop(int Index);
- void __fastcall SelectImage(int Index);
- void __fastcall Stretch(int Index);
- __property Controls::TImageList* DragImageList = {read=FDragImageList, write=FDragImageList};
- __property Graphics::TBitmap* ImageBitmap = {read=FImageBitmap};
- __property int Index = {read=GetIndex, nodefault};
- __property Classes::TList* InfoList = {read=FInfoList};
- __property Controls::TImageList* ImageList = {read=FImageList};
- __property Controls::TImageList* ImageListView = {read=FImageListView};
- __property TImageInfo* Items[int Index] = {read=GetImageInfo};
- __property Controls::TImageList* ComponentList = {read=FComponentList};
- public:
- /* TCustomForm.Create */ __fastcall virtual TImageListEditor(Classes::TComponent* AOwner) : Forms::
- TForm(AOwner) { }
- /* TCustomForm.CreateNew */ __fastcall TImageListEditor(Classes::TComponent* AOwner, int Dummy) : Forms::
- TForm(AOwner, Dummy) { }
- /* TCustomForm.Destroy */ __fastcall virtual ~TImageListEditor(void) { }
-
- public:
- /* TWinControl.CreateParented */ __fastcall TImageListEditor(HWND ParentWindow) : Forms::TForm(ParentWindow
- ) { }
-
- };
-
- class PASCALIMPLEMENTATION TImageInfo : public System::TObject
- {
- typedef System::TObject inherited;
-
- private:
- bool FAutoOp;
- TImageOperation FOperation;
- Classes::TList* FOwner;
- TImageListEditor* FOwnerForm;
- bool FCanChangeTransparent;
- bool FCanChangeFill;
- Graphics::TBitmap* FBitmap;
- Graphics::TBitmap* FMask;
- bool FNew;
- Graphics::TColor FTransparentColor;
- Graphics::TColor FFillColor;
- void __fastcall Center(void);
- void __fastcall Crop(void);
- int __fastcall GetIndex(void);
- void __fastcall SetOperation(TImageOperation Value);
- void __fastcall SetFillColor(Graphics::TColor Value);
- void __fastcall SetTransparentColor(Graphics::TColor Value);
- void __fastcall Stretch(void);
-
- public:
- __fastcall TImageInfo(Classes::TList* AOwner, TImageListEditor* AOwnerForm);
- __fastcall virtual ~TImageInfo(void);
- void __fastcall Change(void);
- void __fastcall SelectImage(void);
- __property Graphics::TBitmap* Bitmap = {read=FBitmap};
- __property Graphics::TBitmap* Mask = {read=FMask};
- __property bool New = {read=FNew, nodefault};
- __property bool CanChangeFill = {read=FCanChangeFill, nodefault};
- __property bool CanChangeTransparent = {read=FCanChangeTransparent, nodefault};
- __property Graphics::TColor FillColor = {read=FFillColor, write=SetFillColor, nodefault};
- __property int Index = {read=GetIndex, nodefault};
- __property TImageOperation Operation = {read=FOperation, write=SetOperation, nodefault};
- __property Classes::TList* Owner = {read=FOwner};
- __property TImageListEditor* OwnerForm = {read=FOwnerForm};
- __property Graphics::TColor TransparentColor = {read=FTransparentColor, write=SetTransparentColor,
- nodefault};
- };
-
- //-- var, const, procedure ---------------------------------------------------
- extern PACKAGE bool __fastcall EditImageList(Controls::TImageList* AImageList);
-
- } /* namespace Imglist */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Imglist;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // Imglist
-